home *** CD-ROM | disk | FTP | other *** search
/ The 640 MEG Shareware Studio 2 / The 640 Meg Shareware Studio CD-ROM Volume II (Data Express)(1993).ISO / dbase / bbsintro.exe / START.BAT < prev    next >
Encoding:
DOS Batch File  |  1992-01-25  |  1.3 KB  |  85 lines
  1. echo off
  2. if exist menu.txt goto default
  3. a:
  4.  
  5. :default
  6. cls
  7. type menu.txt
  8.  
  9. :loop
  10. check KEYPRESS
  11. REM Note the following must be in DESCENDING order of ASCII code.
  12. IF ERRORLEVEL 56 GOTO loop
  13. IF ERRORLEVEL 55 GOTO pressed7
  14. IF ERRORLEVEL 54 GOTO pressed6
  15. IF ERRORLEVEL 53 GOTO pressed5
  16. IF ERRORLEVEL 52 GOTO pressed4
  17. IF ERRORLEVEL 51 GOTO pressed3
  18. IF ERRORLEVEL 50 GOTO pressed2
  19. IF ERRORLEVEL 49 GOTO pressed1
  20. IF ERRORLEVEL 28 GOTO loop
  21. IF ERRORLEVEL 27 GOTO quit
  22. goto loop
  23.  
  24.  
  25. :pressed1
  26. list readme.1st
  27. goto default
  28.  
  29.  
  30. :pressed2
  31. list oas.txt
  32. goto default
  33.  
  34.  
  35. :pressed3
  36. list start.txt
  37. goto default
  38.  
  39.  
  40. :pressed4
  41. list abbl*.txt
  42. goto default
  43.  
  44.  
  45. :pressed5
  46. list member.app
  47. goto default
  48.  
  49.  
  50. :pressed6
  51. cls
  52. echo  
  53.  
  54.  
  55. Echo Make sure your printer is turned on and ready to go.
  56. Echo You will need approximately nine or ten Letter-sized pages
  57. Echo to print on.
  58. echo  
  59. echo Press P to print, any other key to return to menu....
  60. check KEYPRESS
  61. IF ERRORLEVEL 112 goto print
  62. IF ERRORLEVEL  80 goto print
  63. goto default
  64.  
  65. :print
  66. type readme.1st >PRN
  67. echo   >PRN
  68. type oas.txt >PRN
  69. echo   >PRN
  70. type start.txt >PRN
  71. echo   >PRN
  72. copy abbl*.txt PRN: >NUL
  73. echo   >PRN
  74. copy member.app >prn
  75. echo   >PRN
  76. goto default
  77.  
  78.  
  79. :pressed7
  80. echo           NOW LOADING COMM PROGRAM, PLEASE STAND BY....
  81. commo
  82. goto default
  83.  
  84.  
  85. :quit